﻿Imports Tajan.Monitoring.Entities

Public Class UserConnectionRepository
    Inherits BaseRepository

    Public Sub Add(userConnection As UserConnection)
        Me.Context.UserConnections.Add(userConnection)
    End Sub

    'Public Function GetByCo(connectionId As Long, serverUsername As String, clientUsername As String) As Boolean

    '    Dim out = (From p In Me.Context.UserConnections Where p.ConnectionId = connectionId AndAlso p.ServerUsername = serverUsername AndAlso p.ClientUsername = clientUsername Take 1).Single
    '    If out Is Nothing Then
    '        Return False
    '    Else
    '        out.EndDate = Now
    '        Return True
    '    End If

    'End Function


End Class
